object frmCorretor_CodEmpr: TfrmCorretor_CodEmpr
  Left = 310
  Top = 158
  AutoScroll = False
  BorderIcons = [biSystemMenu]
  Caption = 'Corrigir C'#243'digo de Empresas'
  ClientHeight = 174
  ClientWidth = 408
  Color = clWhite
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = [fsBold]
  OldCreateOrder = False
  Position = poScreenCenter
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object pb2: TGauge
    Left = 159
    Top = 59
    Width = 228
    Height = 21
    ForeColor = 10485760
    Progress = 0
  end
  object pb3: TGauge
    Left = 159
    Top = 83
    Width = 228
    Height = 21
    ForeColor = 10485760
    Progress = 0
  end
  object pb4: TGauge
    Left = 159
    Top = 107
    Width = 228
    Height = 21
    ForeColor = 10485760
    Progress = 0
  end
  object Label2: TLabel
    Left = 45
    Top = 63
    Width = 108
    Height = 13
    Caption = 'Gravando Empresa'
  end
  object Label3: TLabel
    Left = 39
    Top = 87
    Width = 116
    Height = 13
    Caption = 'Atualizando Tabelas'
  end
  object Label4: TLabel
    Left = 45
    Top = 111
    Width = 108
    Height = 13
    Caption = 'Excluindo Empresa'
  end
  object Bevel1: TBevel
    Left = -8
    Top = 133
    Width = 422
    Height = 2
  end
  object Label5: TLabel
    Left = 3
    Top = 11
    Width = 69
    Height = 13
    Caption = 'Emp. Antiga'
    Transparent = True
  end
  object btnC_EmpresaOld: TSpeedButton
    Left = 115
    Top = 7
    Width = 22
    Height = 22
    Enabled = False
    Flat = True
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3
      333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0
      C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0
      F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF
      F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF
      00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333
      3333333373FF7333333333333000333333333333377733333333333333333333
      3333333333333333333333333333333333333333333333333333}
    NumGlyphs = 2
    OnClick = btnC_EmpresaOldClick
  end
  object Label6: TLabel
    Left = 9
    Top = 36
    Width = 63
    Height = 13
    Caption = 'Emp. Nova'
    Transparent = True
  end
  object btnC_EmpresaNew: TSpeedButton
    Left = 115
    Top = 32
    Width = 22
    Height = 22
    Enabled = False
    Flat = True
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3
      333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0
      C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0
      F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF
      F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF
      00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333
      3333333373FF7333333333333000333333333333377733333333333333333333
      3333333333333333333333333333333333333333333333333333}
    NumGlyphs = 2
    OnClick = btnC_EmpresaNewClick
  end
  object BitBtn1: TFlatButton
    Left = 4
    Top = 137
    Width = 110
    Height = 30
    Caption = '&Corrigir'
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555775777777
      57705557757777775FF7555555555555000755555555555F777F555555555550
      87075555555555F7577F5555555555088805555555555F755F75555555555033
      805555555555F755F75555555555033B05555555555F755F75555555555033B0
      5555555555F755F75555555555033B05555555555F755F75555555555033B055
      55555555F755F75555555555033B05555555555F755F75555555555033B05555
      555555F75FF75555555555030B05555555555F7F7F75555555555000B0555555
      5555F777F7555555555501900555555555557777755555555555099055555555
      5555777755555555555550055555555555555775555555555555}
    Layout = blGlyphLeft
    NumGlyphs = 2
    TabStop = True
    TabOrder = 2
    OnClick = BitBtn1Click
  end
  object BitBtn2: TFlatButton
    Left = 148
    Top = 137
    Width = 110
    Height = 30
    Caption = 'C&ancelar'
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
      3333333777333777FF3333993333339993333377FF3333377FF3399993333339
      993337777FF3333377F3393999333333993337F777FF333337FF993399933333
      399377F3777FF333377F993339993333399377F33777FF33377F993333999333
      399377F333777FF3377F993333399933399377F3333777FF377F993333339993
      399377FF3333777FF7733993333339993933373FF3333777F7F3399933333399
      99333773FF3333777733339993333339933333773FFFFFF77333333999999999
      3333333777333777333333333999993333333333377777333333}
    Layout = blGlyphLeft
    NumGlyphs = 2
    TabStop = True
    TabOrder = 3
    OnClick = BitBtn2Click
  end
  object BitBtn3: TFlatButton
    Left = 292
    Top = 137
    Width = 110
    Height = 30
    Caption = 'Fecha&r'
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
      03333377777777777F333301111111110333337F333333337F33330111111111
      0333337F333333337F333301111111110333337F333333337F33330111111111
      0333337F333333337F333301111111110333337F333333337F33330111111111
      0333337F3333333F7F333301111111B10333337F333333737F33330111111111
      0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11
      0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11
      0333337F377777337F333301111111110333337F333333337F33330111111111
      0333337FFFFFFFFF7F3333000000000003333377777777777333}
    Layout = blGlyphLeft
    NumGlyphs = 2
    TabStop = True
    TabOrder = 4
    OnClick = BitBtn3Click
  end
  object EdtEmp_codigoOld: TEdit
    Left = 75
    Top = 7
    Width = 33
    Height = 22
    BevelKind = bkFlat
    BorderStyle = bsNone
    MaxLength = 3
    TabOrder = 0
    OnKeyDown = EdtEmp_codigoOldKeyDown
  end
  object pnlOld: TPanel
    Left = 140
    Top = 7
    Width = 265
    Height = 22
    Alignment = taLeftJustify
    BevelInner = bvLowered
    Color = 14081504
    TabOrder = 5
  end
  object EdtEmp_codigoNew: TEdit
    Left = 75
    Top = 32
    Width = 33
    Height = 22
    BevelKind = bkFlat
    BorderStyle = bsNone
    MaxLength = 3
    TabOrder = 1
    OnKeyDown = EdtEmp_codigoNewKeyDown
  end
  object pnlNew: TPanel
    Left = 140
    Top = 32
    Width = 265
    Height = 22
    Alignment = taLeftJustify
    BevelInner = bvLowered
    Color = 14081504
    TabOrder = 6
  end
  object CDS: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 8
    Top = 80
    object CDSOLD: TStringField
      FieldName = 'OLD'
    end
    object CDSNEW: TStringField
      FieldName = 'NEW'
    end
  end
end
